object Form1: TForm1 Left = 74 Top = 108 BorderIcons = [] BorderStyle = bsSingle Caption = 'PGP Setup Wizard' ClientHeight = 339 ClientWidth = 423 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object LMDLabel5: TLMDLabel Left = 77 Top = 6 Width = 202 Height = 30 Caption = 'PGP not installed...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Label1: TLabel Left = 136 Top = 278 Width = 260 Height = 13 Caption = 'Press here to obtain PGP from TransSoft'#39's homepage...' Visible = False end object Label6: TLabel Left = 136 Top = 298 Width = 226 Height = 13 Caption = 'Press here to obtain PGP from MIT homepage...' Visible = False end object Button3: TButton Left = 77 Top = 295 Width = 55 Height = 19 Caption = '&MIT' TabOrder = 9 Visible = False OnClick = Button3Click end object Button2: TButton Left = 77 Top = 276 Width = 55 Height = 19 Caption = '&TransSoft' TabOrder = 8 Visible = False OnClick = Button2Click end object Button1: TButton Left = 206 Top = 318 Width = 75 Height = 15 Caption = 'OK' TabOrder = 7 Visible = False OnClick = Button1Click end object Memo2: TMemo Left = 75 Top = 31 Width = 337 Height = 244 Lines.Strings = ( 'The PGP-system has not been installed on to your system. This mu' + 'st ' 'be done prior to setting up the PGP facilities of TMC Pro. You c' + 'an ' 'access PGP at these locations:' '' 'If you live in the U.S. or Canada please refer to this page:' ' http://web.mit.edu/network/pgp.html' ' Please choose pgp version 2.6' '' 'If you live outside the US and Canda, please download the ' 'International version from our homepage:' ' http://www.centrum.is/~bhg' ' Choose either one of these:' ' pgp26i.zip (DOS version, 16 bit)' ' pgp26ix.zip (DOS version, 32 bit)' '' 'After install, Try again to access PGP mode in the mailer.' '' ' TransSoft Ltd.') ReadOnly = True TabOrder = 6 Visible = False end object PGPpages: TPageControl Left = 0 Top = 0 Width = 423 Height = 339 ActivePage = Produce Align = alClient TabHeight = 15 TabOrder = 0 object Intro: TTabSheet Caption = 'Notification' TabVisible = False object LMDLabel2: TLMDLabel Left = 77 Top = 25 Width = 90 Height = 30 Caption = 'Action...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Memo1: TMemo Left = 77 Top = 72 Width = 320 Height = 89 Lines.Strings = ( 'PGP (Pretty Good Privacy) is installed on to your computer. ' 'Howevere the system needs to know a few things to be able to ' 'use it. Here, in the next few steps, we will set this up for you' + '.' '' 'Here below please select whether or not you want to keep your ' 'old private keys or create new set.') ReadOnly = True TabOrder = 0 end object CheckBox1: TCheckBox Left = 94 Top = 218 Width = 177 Height = 17 Caption = 'Keep previous set of keys' State = cbChecked TabOrder = 1 end end object Produce: TTabSheet Caption = 'Prepare Keys' TabVisible = False object LMDLabel4: TLMDLabel Left = 73 Top = 25 Width = 209 Height = 30 Caption = ' Use previous keys...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Label2: TLabel Left = 115 Top = 159 Width = 58 Height = 13 Alignment = taRightJustify Caption = 'Passphrase:' end object Label3: TLabel Left = 77 Top = 186 Width = 96 Height = 13 Alignment = taRightJustify Caption = 'Private key location:' end object Label4: TLabel Left = 75 Top = 213 Width = 98 Height = 13 Alignment = taRightJustify Caption = 'Public Keys location:' end object SpeedButton1: TSpeedButton Left = 380 Top = 182 Width = 24 Height = 22 Glyph.Data = { 36050000424D3605000000000000360400002800000010000000100000000100 0800000000000001000000000000000000000000000000000000000000004000 000080000000FF000000002000004020000080200000FF200000004000004040 000080400000FF400000006000004060000080600000FF600000008000004080 000080800000FF80000000A0000040A0000080A00000FFA0000000C0000040C0 000080C00000FFC0000000FF000040FF000080FF0000FFFF0000000020004000 200080002000FF002000002020004020200080202000FF202000004020004040 200080402000FF402000006020004060200080602000FF602000008020004080 200080802000FF80200000A0200040A0200080A02000FFA0200000C0200040C0 200080C02000FFC0200000FF200040FF200080FF2000FFFF2000000040004000 400080004000FF004000002040004020400080204000FF204000004040004040 400080404000FF404000006040004060400080604000FF604000008040004080 400080804000FF80400000A0400040A0400080A04000FFA0400000C0400040C0 400080C04000FFC0400000FF400040FF400080FF4000FFFF4000000060004000 600080006000FF006000002060004020600080206000FF206000004060004040 600080406000FF406000006060004060600080606000FF606000008060004080 600080806000FF80600000A0600040A0600080A06000FFA0600000C0600040C0 600080C06000FFC0600000FF600040FF600080FF6000FFFF6000000080004000 800080008000FF008000002080004020800080208000FF208000004080004040 800080408000FF408000006080004060800080608000FF608000008080004080 800080808000FF80800000A0800040A0800080A08000FFA0800000C0800040C0 800080C08000FFC0800000FF800040FF800080FF8000FFFF80000000A0004000 A0008000A000FF00A0000020A0004020A0008020A000FF20A0000040A0004040 A0008040A000FF40A0000060A0004060A0008060A000FF60A0000080A0004080 A0008080A000FF80A00000A0A00040A0A00080A0A000FFA0A00000C0A00040C0 A00080C0A000FFC0A00000FFA00040FFA00080FFA000FFFFA0000000C0004000 C0008000C000FF00C0000020C0004020C0008020C000FF20C0000040C0004040 C0008040C000FF40C0000060C0004060C0008060C000FF60C0000080C0004080 C0008080C000FF80C00000A0C00040A0C00080A0C000FFA0C00000C0C00040C0 C00080C0C000FFC0C00000FFC00040FFC00080FFC000FFFFC0000000FF004000 FF008000FF00FF00FF000020FF004020FF008020FF00FF20FF000040FF004040 FF008040FF00FF40FF000060FF004060FF008060FF00FF60FF000080FF004080 FF008080FF00FF80FF0000A0FF0040A0FF0080A0FF00FFA0FF0000C0FF0040C0 FF0080C0FF00FFC0FF0000FFFF0040FFFF0080FFFF00FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFF6D6D6D6D6D6D6D6D6D6D6D6D6DFFFFD9D9D9D9 D9D9D9D9D9D9D9D9D96DFFFFD9FFFDFDFDFDFDFDFDFDFDD96D6DFFD9FFFDFDFD FDFDFDFDFDFDFDD96D6DFFD9FFFDFDFDFDFDFDFDFDFDD96D916DD9FFFDFDFDFD FDFDFDFDFDFDD96D916DD9FFFDFDFDFDFDFDFDFDFDD96D91916DD9FFFFFFFFFF FFFFFFFFFFD96D91916DFFD9DADADADADADADADADADA91F9916DFFD9F9F9F9F9 F9F9F9F9F9F9F9F9916DFFD9F9F9F9F9F9F9D9D9D9D9D9D991FFFFFFD9F9F9F9 F9D991FFFFFFFFFFFFFFFFFFFFD9D9D9D991FFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 380 Top = 209 Width = 24 Height = 22 Glyph.Data = { 36050000424D3605000000000000360400002800000010000000100000000100 0800000000000001000000000000000000000000000000000000000000004000 000080000000FF000000002000004020000080200000FF200000004000004040 000080400000FF400000006000004060000080600000FF600000008000004080 000080800000FF80000000A0000040A0000080A00000FFA0000000C0000040C0 000080C00000FFC0000000FF000040FF000080FF0000FFFF0000000020004000 200080002000FF002000002020004020200080202000FF202000004020004040 200080402000FF402000006020004060200080602000FF602000008020004080 200080802000FF80200000A0200040A0200080A02000FFA0200000C0200040C0 200080C02000FFC0200000FF200040FF200080FF2000FFFF2000000040004000 400080004000FF004000002040004020400080204000FF204000004040004040 400080404000FF404000006040004060400080604000FF604000008040004080 400080804000FF80400000A0400040A0400080A04000FFA0400000C0400040C0 400080C04000FFC0400000FF400040FF400080FF4000FFFF4000000060004000 600080006000FF006000002060004020600080206000FF206000004060004040 600080406000FF406000006060004060600080606000FF606000008060004080 600080806000FF80600000A0600040A0600080A06000FFA0600000C0600040C0 600080C06000FFC0600000FF600040FF600080FF6000FFFF6000000080004000 800080008000FF008000002080004020800080208000FF208000004080004040 800080408000FF408000006080004060800080608000FF608000008080004080 800080808000FF80800000A0800040A0800080A08000FFA0800000C0800040C0 800080C08000FFC0800000FF800040FF800080FF8000FFFF80000000A0004000 A0008000A000FF00A0000020A0004020A0008020A000FF20A0000040A0004040 A0008040A000FF40A0000060A0004060A0008060A000FF60A0000080A0004080 A0008080A000FF80A00000A0A00040A0A00080A0A000FFA0A00000C0A00040C0 A00080C0A000FFC0A00000FFA00040FFA00080FFA000FFFFA0000000C0004000 C0008000C000FF00C0000020C0004020C0008020C000FF20C0000040C0004040 C0008040C000FF40C0000060C0004060C0008060C000FF60C0000080C0004080 C0008080C000FF80C00000A0C00040A0C00080A0C000FFA0C00000C0C00040C0 C00080C0C000FFC0C00000FFC00040FFC00080FFC000FFFFC0000000FF004000 FF008000FF00FF00FF000020FF004020FF008020FF00FF20FF000040FF004040 FF008040FF00FF40FF000060FF004060FF008060FF00FF60FF000080FF004080 FF008080FF00FF80FF0000A0FF0040A0FF0080A0FF00FFA0FF0000C0FF0040C0 FF0080C0FF00FFC0FF0000FFFF0040FFFF0080FFFF00FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFF6D6D6D6D6D6D6D6D6D6D6D6D6DFFFFD9D9D9D9 D9D9D9D9D9D9D9D9D96DFFFFD9FFFDFDFDFDFDFDFDFDFDD96D6DFFD9FFFDFDFD FDFDFDFDFDFDFDD96D6DFFD9FFFDFDFDFDFDFDFDFDFDD96D916DD9FFFDFDFDFD FDFDFDFDFDFDD96D916DD9FFFDFDFDFDFDFDFDFDFDD96D91916DD9FFFFFFFFFF FFFFFFFFFFD96D91916DFFD9DADADADADADADADADADA91F9916DFFD9F9F9F9F9 F9F9F9F9F9F9F9F9916DFFD9F9F9F9F9F9F9D9D9D9D9D9D991FFFFFFD9F9F9F9 F9D991FFFFFFFFFFFFFFFFFFFFD9D9D9D991FFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} OnClick = SpeedButton2Click end object Edit2: TEdit Left = 175 Top = 155 Width = 205 Height = 21 PasswordChar = '*' TabOrder = 0 OnExit = Edit2Exit end object Edit3: TEdit Left = 175 Top = 182 Width = 205 Height = 21 TabOrder = 1 OnExit = Edit3Exit end object Edit4: TEdit Left = 175 Top = 209 Width = 205 Height = 21 TabOrder = 2 OnExit = Edit4Exit end end object Various: TTabSheet Caption = 'Various' TabVisible = False object Label5: TLabel Left = 95 Top = 232 Width = 23 Height = 13 Caption = 'Click' Transparent = True end object Label8: TLabel Left = 123 Top = 232 Width = 25 Height = 13 Caption = 'next' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label9: TLabel Left = 152 Top = 232 Width = 9 Height = 13 Caption = 'or' Transparent = True end object Label10: TLabel Left = 166 Top = 232 Width = 31 Height = 13 Caption = 'finish' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label11: TLabel Left = 201 Top = 232 Width = 122 Height = 13 Caption = 'to create install TMC-PGP' Transparent = True end object LMDLabel1: TLMDLabel Left = 77 Top = 25 Width = 180 Height = 30 Caption = 'Almost finished...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Label15: TLabel Left = 94 Top = 99 Width = 279 Height = 42 AutoSize = False Caption = 'The wizard will generate identical keysystem for it'#39's own use. P' + 'lease make sure these information are correct before continuing.' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label16: TLabel Left = 96 Top = 154 Width = 38 Height = 13 Caption = 'Label16' end object Label17: TLabel Left = 96 Top = 169 Width = 38 Height = 13 Caption = 'Label16' end object Label18: TLabel Left = 96 Top = 185 Width = 38 Height = 13 Caption = 'Label16' end object Label19: TLabel Left = 96 Top = 202 Width = 38 Height = 13 Caption = 'Label16' end end object CreateNew: TTabSheet Caption = 'CreateNew' TabVisible = False object LMDLabel6: TLMDLabel Left = 76 Top = 25 Width = 249 Height = 30 Caption = 'Create new set of keys...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Label12: TLabel Left = 94 Top = 118 Width = 279 Height = 44 AutoSize = False Caption = 'The wizard will open an MSDOS window to run PGP. Please follow t' + 'he instructions from there on. The wizard will then generate key' + 'system for the TMC PRO PGP.' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end object Finish: TTabSheet Caption = 'Finish' TabVisible = False object LMDLabel3: TLMDLabel Left = 76 Top = 25 Width = 86 Height = 30 Caption = 'Finish...' Font.Color = clBlack Font.Height = -24 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised ParentFont = False Transparent = True end object Label14: TLabel Left = 94 Top = 102 Width = 279 Height = 53 AutoSize = False Caption = 'The wizard will spawn out to the DOS enviroment to give control ' + 'the the PGP system. This has to be done via the PGP.exe which so' + 'lely can create valid keys.' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end end object Button5: TButton Left = 174 Top = 276 Width = 72 Height = 17 Caption = '<< &Previous' Enabled = False TabOrder = 1 OnClick = Button5Click end object Button6: TButton Left = 251 Top = 276 Width = 72 Height = 17 Caption = '&Next >>' Default = True TabOrder = 2 OnClick = Button6Click end object Button7: TButton Left = 329 Top = 276 Width = 72 Height = 17 Caption = '&Finish' Default = True Enabled = False TabOrder = 3 OnClick = Button7Click end object Button8: TButton Left = 97 Top = 276 Width = 72 Height = 17 Caption = '&Cancel' TabOrder = 4 OnClick = Button8Click end object Panel1: TPanel Left = 0 Top = 2 Width = 73 Height = 336 TabOrder = 5 object LMDLabel7: TLMDLabel Left = -8 Top = 15 Width = 76 Height = 296 Caption = 'PGP setup' Font.Color = clBlack Font.Height = -64 Font.Name = 'Times New Roman' Font.Style = [fsBold] FontFx.LightColor = clWhite FontFx.Style = tdPColorRaised FontFx.Angle = 90 FontFx.PosX = 2 FontFx.PosY = 294 ParentFont = False Transparent = True end end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Filter = 'PGP files|*.pgp;*.pub;*.sec|All files|*.*' Title = 'Select file containing private keyring...' Left = 372 Top = 23 end object OpenDialog2: TOpenDialog FileEditStyle = fsEdit Filter = 'PGP files|*.pgp;*.pub;*.sec|All files|*.*' Title = 'Select file containing public keyring...' Left = 372 Top = 51 end object MainMenu1: TMainMenu Left = 343 Top = 23 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Exit1: TMenuItem Caption = '&Exit' ShortCut = 0 OnClick = Exit1Click end end end object AppException1: TAppException ErrorLog = 'PGPsetup.log' UserName = 'PGPsetup.exe' ShowExcep = False Left = 318 Top = 24 end object Timer1: TTimer Enabled = False Interval = 600 OnTimer = Timer1Timer Left = 286 Top = 24 end end